home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 22 / AACD 22.iso / AACD / Programming / powerd / lib / powerd.lha / powerd_ppc / OpenW.d < prev    next >
Encoding:
Text File  |  1980-04-24  |  443 b   |  23 lines
  1. OPT    PPC,NOEXE,NOSTD
  2.  
  3. MODULE    'intuition/intuition'
  4.  
  5. PROC OpenW(x,y,wi,he,idcmp,flags,title,screen,stype,gadgets,tags)(L)
  6.     DEF    window:PTR TO Window
  7.     window:=OpenWindowTags(NIL,
  8.         WA_Left,x,
  9.         WA_Top,x,
  10.         WA_Width,wi,
  11.         WA_Height,he,
  12.         WA_IDCMP,idcmp,
  13.         WA_Flags,flags,
  14.         WA_Title,title,
  15.         WA_CustomScreen,screen,
  16.         WA_Gadgets,gadgets,
  17.         TAG_MORE,tags,
  18.         TAG_END)
  19.     IF window THEN stdrast:=window.RPort
  20. ENDPROC window
  21.  
  22. DEF    stdrast,stdrast_coloura
  23.